home *** CD-ROM | disk | FTP | other *** search
/ Risc World 3 / Risc World 3.iso / SOFTWARE / ISSUE2 / PD / LOCATE / !Locate / !Boot next >
Text File  |  2002-05-12  |  610b  |  25 lines
  1. | >!Boot
  2. |
  3. | Locate
  4. | (C) Stephen Fryatt, 2001
  5. |
  6. | Version 0.65
  7. | 12 May 2002
  8.  
  9. If "<Locate$Dir>"="" Then Set Locate$Dir <Obey$Dir>
  10. If "<Locate$Path>"="" Then Set Locate$Path <Locate$Dir>.
  11.  
  12. Set Alias$@RunType_1A1 Run <Obey$Dir>.!Run -file %%*0
  13. Set File$Type_1A1 Locate
  14.  
  15. | Comment out this line (and the corresponding one in !Run) to prevent
  16. | Locate behaving as a Filer Plugin under Select.
  17.  
  18. Set Alias$@FilerAction_Find Run <Obey$Dir>.!Run -plugin
  19.  
  20. | ---
  21.  
  22. If "<Boot$OSVersion>" < 400 Then Set Locate$Sprites Locate:Themes.Default Else Set Locate$Sprites Locate:Themes.RO4
  23.  
  24. IconSprites <Locate$Sprites>.!Sprites
  25.